home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / Hyperj-Hz / HYPZOE.cpt / HyperZoetropes / background_2722.txt < prev    next >
Text File  |  1988-02-25  |  7KB  |  301 lines
  1. -- background: 2722 from stack: in
  2. -- bmap block id: 2229
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=143 top=151 right=169 bottom=162
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 1015 / 1015
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New Button
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   set hilite of background button "bubbles" to false
  23.   show all cards
  24.   show all cards
  25.   show all cards
  26.   set hilite of background button bubbles to true
  27.   go first
  28. end mouseUp
  29.  
  30.  
  31.  
  32. -- part 2 (button)
  33. -- low flags: 00
  34. -- high flags: 4001
  35. -- rect: left=33 top=20 right=145 bottom=157
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 0 / 0
  38. -- text alignment: 1
  39. -- font id: 0
  40. -- text size: 12
  41. -- style flags: 0
  42. -- line height: 16
  43. -- part name: bubbles
  44.  
  45.  
  46. -- part 3 (button)
  47. -- low flags: 00
  48. -- high flags: 4001
  49. -- rect: left=196 top=20 right=145 bottom=320
  50. -- title width / last selected line: 0
  51. -- icon id / first selected line: 0 / 0
  52. -- text alignment: 1
  53. -- font id: 0
  54. -- text size: 12
  55. -- style flags: 0
  56. -- line height: 16
  57. -- part name: horse
  58.  
  59.  
  60. -- part 5 (button)
  61. -- low flags: 00
  62. -- high flags: 4001
  63. -- rect: left=33 top=184 right=309 bottom=157
  64. -- title width / last selected line: 0
  65. -- icon id / first selected line: 0 / 0
  66. -- text alignment: 1
  67. -- font id: 0
  68. -- text size: 12
  69. -- style flags: 0
  70. -- line height: 16
  71. -- part name: pitchforks
  72.  
  73.  
  74. -- part 6 (button)
  75. -- low flags: 00
  76. -- high flags: 4001
  77. -- rect: left=196 top=184 right=309 bottom=320
  78. -- title width / last selected line: 0
  79. -- icon id / first selected line: 0 / 0
  80. -- text alignment: 1
  81. -- font id: 0
  82. -- text size: 12
  83. -- style flags: 0
  84. -- line height: 16
  85. -- part name: seesaw
  86.  
  87.  
  88. -- part 7 (button)
  89. -- low flags: 00
  90. -- high flags: 4001
  91. -- rect: left=355 top=184 right=309 bottom=479
  92. -- title width / last selected line: 0
  93. -- icon id / first selected line: 0 / 0
  94. -- text alignment: 1
  95. -- font id: 0
  96. -- text size: 12
  97. -- style flags: 0
  98. -- line height: 16
  99. -- part name: idol
  100.  
  101.  
  102. -- part 8 (button)
  103. -- low flags: 00
  104. -- high flags: 2000
  105. -- rect: left=306 top=151 right=169 bottom=325
  106. -- title width / last selected line: 0
  107. -- icon id / first selected line: 1015 / 1015
  108. -- text alignment: 1
  109. -- font id: 0
  110. -- text size: 12
  111. -- style flags: 0
  112. -- line height: 16
  113. -- part name: New Button
  114. ----- HyperTalk script -----
  115. on mouseUp
  116.   set hilite of background button "horse" to false
  117.   show all cards
  118.   show all cards
  119.   show all cards
  120.   set hilite of background button "horse" to true
  121.   go first
  122. end mouseUp
  123.  
  124.  
  125.  
  126. -- part 9 (button)
  127. -- low flags: 00
  128. -- high flags: 2000
  129. -- rect: left=465 top=151 right=169 bottom=484
  130. -- title width / last selected line: 0
  131. -- icon id / first selected line: 1015 / 1015
  132. -- text alignment: 1
  133. -- font id: 0
  134. -- text size: 12
  135. -- style flags: 0
  136. -- line height: 16
  137. -- part name: New Button
  138. ----- HyperTalk script -----
  139. on mouseUp
  140.   set visible of background field "teaser" to not the visible of background field "teaser"
  141.   set visible of background button "home" to not the visible of background button "home"
  142.   set visible of background button "open stack..." to not the visible of background button "open stack..."
  143.   set visible of background button "magnify" to not the visible of background button "magnify"
  144. end mouseUp
  145.  
  146.  
  147.  
  148. -- part 10 (button)
  149. -- low flags: 00
  150. -- high flags: 2000
  151. -- rect: left=143 top=315 right=333 bottom=162
  152. -- title width / last selected line: 0
  153. -- icon id / first selected line: 1015 / 1015
  154. -- text alignment: 1
  155. -- font id: 0
  156. -- text size: 12
  157. -- style flags: 0
  158. -- line height: 16
  159. -- part name: New Button
  160. ----- HyperTalk script -----
  161. on mouseUp
  162.   set hilite of background button "pitchforks" to false
  163.   show all cards
  164.   show all cards
  165.   show all cards
  166.   set hilite of background button "pitchforks" to true
  167.   go first
  168. end mouseUp
  169.  
  170.  
  171.  
  172. -- part 11 (button)
  173. -- low flags: 00
  174. -- high flags: 2000
  175. -- rect: left=306 top=315 right=333 bottom=325
  176. -- title width / last selected line: 0
  177. -- icon id / first selected line: 1015 / 1015
  178. -- text alignment: 1
  179. -- font id: 0
  180. -- text size: 12
  181. -- style flags: 0
  182. -- line height: 16
  183. -- part name: New Button
  184. ----- HyperTalk script -----
  185. on mouseUp
  186.   set hilite of background button "seesaw" to false
  187.   show all cards
  188.   show all cards
  189.   show all cards
  190.   set hilite of background button seesaw to true
  191.   go first
  192. end mouseUp
  193.  
  194.  
  195.  
  196. -- part 12 (button)
  197. -- low flags: 00
  198. -- high flags: 2000
  199. -- rect: left=465 top=315 right=333 bottom=484
  200. -- title width / last selected line: 0
  201. -- icon id / first selected line: 1015 / 1015
  202. -- text alignment: 1
  203. -- font id: 0
  204. -- text size: 12
  205. -- style flags: 0
  206. -- line height: 16
  207. -- part name: New Button
  208. ----- HyperTalk script -----
  209. on mouseUp
  210.   set hilite of background button "idol" to false
  211.   show all cards
  212.   show all cards
  213.   show all cards
  214.   set hilite of background button idol to true
  215.   go first
  216. end mouseUp
  217.  
  218.  
  219.  
  220. -- part 13 (field)
  221. -- low flags: 81
  222. -- high flags: 0007
  223. -- rect: left=355 top=20 right=107 bottom=479
  224. -- title width / last selected line: 0
  225. -- icon id / first selected line: 0 / 0
  226. -- text alignment: 0
  227. -- font id: 3
  228. -- text size: 9
  229. -- style flags: 0
  230. -- line height: 12
  231. -- part name: teaser
  232. ----- HyperTalk script -----
  233. on mouseup
  234.   hide background field "teaser"
  235.   hide background button "home"
  236.   hide background button "open stack..."
  237.   hide background button "magnify"
  238. end mouseup
  239.  
  240.  
  241.  
  242. -- part 15 (button)
  243. -- low flags: 80
  244. -- high flags: 2002
  245. -- rect: left=437 top=107 right=144 bottom=478
  246. -- title width / last selected line: 0
  247. -- icon id / first selected line: 1011 / 1011
  248. -- text alignment: 1
  249. -- font id: 0
  250. -- text size: 12
  251. -- style flags: 0
  252. -- line height: 16
  253. -- part name: home
  254. ----- HyperTalk script -----
  255. on mouseUp
  256.   answer "Go to Home stack?" with "Home..." or "Cancel"
  257.   if it is "Cancel" then exit mouseUp
  258.   go home
  259. end mouseUp
  260.  
  261.  
  262.  
  263. -- part 16 (button)
  264. -- low flags: 80
  265. -- high flags: 2002
  266. -- rect: left=396 top=107 right=144 bottom=437
  267. -- title width / last selected line: 0
  268. -- icon id / first selected line: 1000 / 1000
  269. -- text alignment: 1
  270. -- font id: 0
  271. -- text size: 12
  272. -- style flags: 0
  273. -- line height: 16
  274. -- part name: Open stack...
  275. ----- HyperTalk script -----
  276. on mouseUp
  277.   answer "Open another stack?" with "Open..." or "Cancel"
  278.   if it is "Cancel" then exit mouseUp
  279.   doMenu "Open Stack..."
  280. end mouseUp
  281.  
  282.  
  283.  
  284. -- part 17 (button)
  285. -- low flags: 80
  286. -- high flags: 2002
  287. -- rect: left=356 top=107 right=144 bottom=396
  288. -- title width / last selected line: 0
  289. -- icon id / first selected line: 8538 / 8538
  290. -- text alignment: 1
  291. -- font id: 0
  292. -- text size: 12
  293. -- style flags: 0
  294. -- line height: 16
  295. -- part name: magnify
  296. ----- HyperTalk script -----
  297. on mouseUp
  298.   set the visible of card field "magnify" to not the visible of card field "magnify"
  299. end mouseUp
  300.  
  301.